program New;
begin
  while(true)do
  begin
    Writeln(GetUpperMsg);
    Wait(500);
  end;
end.
